﻿Imports ModuloVendas
Public Class VeiculosUC
    Private Sub TSBMarca_Click(sender As System.Object, e As System.EventArgs) Handles TSBMarca.Click
        frmPrincipal.TPVeiculos.Controls.Clear()
        Dim uc = New MarcaUC()
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPVeiculos.Controls.Add(uc)
    End Sub

    Private Sub TSBCarro_Click(sender As System.Object, e As System.EventArgs) Handles TSBCarro.Click
        frmPrincipal.TPVeiculos.Controls.Clear()
        Dim uc = New CarroUC()
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPVeiculos.Controls.Add(uc)
    End Sub

    Private Sub TSBPlaca_Click(sender As System.Object, e As System.EventArgs) Handles TSBPlaca.Click
        frmPrincipal.TPVeiculos.Controls.Clear()
        Dim uc = New PlacaUC()
        uc.Dock = DockStyle.Fill
        frmPrincipal.TPVeiculos.Controls.Add(uc)
    End Sub
End Class
